home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
The World of Computer Software.iso
/
hmfsho.zip
/
HMFLIVE.SCR
< prev
next >
Wrap
Text File
|
1991-11-11
|
3KB
|
172 lines
(LOAD "3D")
LAYER S 0
LIMITS 0,0 32',20'
STYLE RD ROMAND 0.0 1.2 0.0 N N N
STYLE HV c:/hmfshow/HELV 0.0 1.0 0.0 N N
ZOOM A
COLOR Y
TEXT S HV F 2'8",7" 30',7" 1'2"
%%u%%oHOWARD M. FULMER - HMF CONSULTING - (215) 275-9866%%o%%u
TEXT S HV 1'10",18' 10" 0
Draw Bottom Shelf (BOX)
DELAY 2000
ERASE SI L
COLOR W
BOX
4',5'
2'
6'
2"
0
COLOR Y
TEXT 1'10",18' 10" 0
Generate Middle, Top Shelves (COPY Multiple)
DELAY 2000
ERASE SI L
COPY SI L M @ @5'<0 @10'<0
COLOR Y
TEXT 1'10",18' 10" 0
Draw Back Panel (BOX)
DELAY 2000
ERASE SI L
COLOR W
BOX
21',5'
3"
6'
7'
0
COLOR Y
TEXT 1'10",18' 10" 0
Draw Base Unit (BOX)
DELAY 2000
ERASE SI L
COLOR W
BOX
26',5'
3'
6'
1'
0
COLOR Y
TEXT 1'10",18' 10" 0
Let's label the components for reference.
DELAY 2000
ERASE SI L
TEXT 1'10",18' 10" 0
Bottom (BS), Middle (MS), and Top (TS) Shelves
DELAY 2000
ERASE SI L
TEXT 4'6",4' 10" 0
BS
TEXT 9'3",4' 10" 0
MS
TEXT 14'2",4' 10" 0
TS
TEXT 1'10",18' 10" 0
Back Panel (BP) and Base Unit (BU)
DELAY 2000
ERASE SI L
TEXT 20'6",4' 10" 0
BP
TEXT 26'9",4' 10" 0
BU
TEXT 1'10",18' 10" 0
The Base Unit (BU) rests on the floor, 1' high.
DELAY 2000
ERASE SI L
TEXT 1'10",18' 10" 0
The Back Panel (BP) rests on the floor, 7' high.
DELAY 2000
ERASE SI L
TEXT 1'10",18' 10" 0
Shelves are spaced 2' apart, 2'' high.
DELAY 2000
ERASE SI L
MOVE SI 4',11'
0,0,0
0,0,2'8"
MOVE SI 9',11'
0,0,0
0,0,4'8"
MOVE SI 14',11'
0,0,0
0,0,6'8"
TEXT 1'10",18' 10" 0
Let's check a 3-D viewpoint (VPOINT)
DELAY 2000
ERASE SI L
VPOINT -3,-2,2
ZOOM E
DELAY 3000
PLAN W
ZOOM .9X
TEXT 1'10",18' 10" 0
Assemble. (MOVE objects to BP)
DELAY 2000
ERASE SI L
MOVE SI 4',11'
6',5'
21',5'
MOVE SI 9',11'
11',5'
21',5'
MOVE SI 14',11'
16',5'
21',5'
MOVE SI 26',11'
30',5'
22',5'
TEXT 1'10",18' 10" 0
Let's ERASE the component labels
DELAY 2000
ERASE SI L
ERASE W
3',3'
30',5'
TEXT 1'10",18' 10" 0
Now, it's YOUR turn.
DELAY 2000
ERASE SI L
TEXT 1'10",18' 10" 0
Try the following commands:
DELAY 2000
ERASE SI L
TEXT 1'10",18' 10" 0
VPOINT, ZOOM, and HIDE
DELAY 2000
ERASE SI L
TEXT 1'10",18' 10" 0
EXERCISE: Place objects on the shelves.
DELAY 2000
ERASE SI L
TEXT 1'10",18' 10" 0
Let's draw 3 cones on Layer OBJECTS
DELAY 2000
ERASE SI L
TEXT 1'10",18' 10" 0
Can you MOVE them?
DELAY 2000
ERASE SI L
COLOR BYLAYER
LAYER M OBJECTS C G
CONE
12',10'
7"
0
1'
16
COPY SI L
M
@
@2'<270
@4'<270
TEXT 1'10",18' 10" 0
END OF HMFSHOW - GOOD LUCK!